﻿Public Class frmQuery

#Region "Declaration"
    Private _script As String = String.Empty
#End Region

#Region "Constructor"

    Public Sub New()
        ' This call is required by the Windows Form Designer.
        InitializeComponent()
        ' Add any initialization after the InitializeComponent() call.
    End Sub

#End Region

#Region "Property"

    Property Script() As String
        Get
            Return _script
        End Get
        Set(ByVal value As String)
            _script = value
            txtQuery.Text = value
        End Set
    End Property

#End Region

#Region "Method"

#End Region

#Region "Event"

#End Region

    Private Sub frmQuery_Activated(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Activated
        frmMain.tbrExecuteScript.Visible = True
    End Sub

    Private Sub frmQuery_Deactivate(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Deactivate
        frmMain.tbrExecuteScript.Visible = False
    End Sub
End Class